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1. General Description 


VISERVO is a set of driver routines for the Servo 
Printer (2200-250 Series). The routines are written for a 

version 1 2200 but are upward compatible. The size of the 
2200 required is determined by the user's calling program. 


2. Operating Instructions 


The user may use V1SERVO to print an entire string by 
setting the H and L registers to the address of the string 

to be printed and calling PRINTS- PRINTS returns when 
either a 003 (which has no effect on the printing) or an 015 

(which causes a carriage return and line feed) is 
encountered. The following control characters have special 
meanings to the string printing routine: 


QM iasxs h irnszim. 


003 

Oil 

012 

014 

015 

023 


Terminate string 

Next character horizontal position 
Line feed 
Form feed 


Carriage return/Line feed 
Line feed 


VISERVO may also be used to print a character by 
calling the routine SPRINT with a character to be printed in 
the 3-register. Every ASCII character found on the 
Datapoint 2200 keyboard is a legal printing character on the 
Servo Printer. The following control characters have the 
specified functions in the character printing routine: 


C_ka p a c ke r Ei m g Uon 


012 Line feed 

014 Form feed 

015 Carriage return 


The user's routine must initialize the printer (by 
calling PRINTP which restores the printer and resets 
position counters) prior to the first call to VISERVO. 

The following is a sample program using the string and 
character printing facilities of VISERVO: 


1 



PRINTS LINES INPUT FROM THE KEYBOARD 


PRINTS 

EQU 

010024 

STRING PRINTING ROUTINE 

PRINTP 

EQU 

010000 

PRINTER INITIALIZATION ROUTINE 

SPRINT 

EQU 

010251 

SINGLE CHARACTER PRINT ROUTINE 

KEYINS 

EQU 

01157 

DOS INTERRUPTA3LE KEYIN ROUTINE 

LINE 

SK 

70 

LINE BUFFER 

LINPTR 

DC 

LINE 

LINE BUFFER POINTER 

• 

START 

CALL 

PRINTP 

PREP THE PRINTER 


LB 

014 

FORM FEED 


CALL 

SPRINT 


LOOP 

HL 

LINE 



LC 

70 



CALL 

KEYINS 

KEYIN A LINE 


HL 

LINE 



CALL 

PRINTS 

PRINT A LINE 


JMP 

LOOP 
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UNUSED LABELSt 


PRINTP 
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1 t 
2 . 
3 * 

4, 

5, 

0. 

7, 

8. 

9. 

I®. 

11 . 

12 . 

13, 

14, 

15, 
18, 

17, 

18, 

19, 

20 . 
21 , 
22 , 

23, 

24, 

25, 

26, 

27, 

28, 


PROGRAM V1 SERVO - VERSION 1 SERVO PRINTER SUBROUTINES 

PRINTS PRINTS A STRING OF CHARACTERS WHICH ARE IN MEMORY 
STARTING WITH THE ADDRESS GIVEN IN THE H AND L 
REGISTERS AND AT THE POSITION PREVIOUSLY LEFT IN THE 
HORIZONTAL POSITION BUFFER, SOME OF THE SPECIAL CONTROL 
CHARACTERS USED IN DSPLYS ARE ALLOWED SO THAT PRINTS 
MAY BE CALLED WITH THE SAME STRINGS AS DSPLYS, 


ENTRY POINTS 


ENTRY VALUES FOR PRINTS 
EXIT VALUES FOR PRINTS 

CONTROL CHARACTERS 


PRINTP - INITIALIZE PRINTER 
PRINTS w PRINT LINE 
SPRINT PRINT CHARACTER 

HL - BEGINNING OF STRING 

HL - ADDRESS OF CHARACTER AFTER TERMINATOR 


003 

011 

012 

013 

014 

015 

021 

022 

023 


END OF STRING 

A NEW HORIZONTAL POSITION FOLLOWS 
LINE FEED 
IGNORED 
FORM PEED 

END OF THE LINE (DOES CR/LF) 

IGNORED 

IGNORED 

ROLLUP (DOES LP) 


29, 





, PRINT 

PREP 

ROUTINE 


30. 





, RESTORE PRINTER AND I 

NITIALIZE COUNTERS 

31. 





, 




32, 

10000 

006 

132 


PRINTP 

LA 

SRVAOR 


33, 

10002 

121 




EX 

ADR 


34. 

10003 

123 




EX 

STATUS 

INITIALIZE PRINTER 

35, 

10004 

250 




XRA 



36, 

10005 

066 

130 

056 021 370 


MSA 

•BMPCNT 


37. 

10012 

066 

131 

370 


MSA 

BMPCNT+1 


36, 

10015 

066 

132 

370 


MSA 

HORPOS 

INITIALIZE PARAMETERS 

39, 

10020 

066 

133 

370 


MSA 

HORPQS+1 


40, 

A 4 

10023 

007 




RET 



41 , 
42, 





! PRINT 

A line starting 

AT HL 

43, 





• 




44, 

10024 

317 



PRINTS 

LBM 



45. 

10025 

106 

236 

020 


CALL 

inchl 


46. 

10030 

106 

123 

020 


CALL 

PSVHL 

SAVE HL 

47. 

10033 

301 




LAB 



48, 

10034 

074 

003 



CP 

3 


49. 

10036 

150 

070 

020 


JTZ 

PRTNXT 

TERMINATE 

50, 

10041 

074 

011 



CP 

011 


51. 

10043 

130 

136 

020 


JTZ 

PBUMP 

A NEW HORIZONTAL POSITION 

32. 

10046 

074 

016 



CP 

015+1 


53, 

10050 

140 

065 

020 


JTC 

PRINTS 


54. 

1 

07 4 

023 



CP 

023 
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55, 

10055 

140 

070 

020 




JTC 

PRTNXT 

56. 

10060 

110 

065 

020 




JFZ 

PRINTS 

57, 

10063 

016 

012 





L9 

012 

58, 

10065 

106 

251 

020 



PRINTS 

CALL 

SPRINT 

59, 

10070 

106 

111 

020 



PRTNXT 

CALL 

PRSHL 

60, 

10073 

301 






LAB 


61. 

10074 

074 

003 





CP 

3 

62, 

10076 

053 






RTZ 


63, 

10077 

074 

015 





CP 

015 

64, 

10101 

110 

024 

020 




JFZ 

PRINTS 

65, 

10104 

016 

012 





LB 

012 

66, 

10106 

106 

251 

020 




CALL 

SPRINT 

67, 







, 



68, 







, RESTORE H 

AND L 

69. 







, 



70, 

10111 

066 

230 

056 

020 

307 

PRSHL 

MLA 

• PH 

71, 

10116 

066 

247 

367 




MLL 

PL 

72, 

10121 

350 






lha 


73, 

10122 

007 






RET 


74. 







, 



75, 







, SAVE 

H AND 

L 

76. 







t 



77, 

10123 

335 





P5VHL 

LOH 


78, 

10124 

306 






LAL 


79, 

10125 

066 

250 

006 

020 

373 


MSD 

• PH 

80, 

10132 

066 

247 

370 




MSA 

PL 

81, 

10135 

007 






RET 


82, 







• 



83, 

10136 

106 

111 

020 



PBUHP 

CALL 

PRSHL 

84. 

10141 

327 






LCM 


85, 

10142 

016 

000 





LB 

0 

86, 

10144 

106 

236 

020 




CALL 

INCHL 

67, 

10147 

106 

123 

020 




CALL 

PSVHL 

88, 







• 



89, 

10152 

302 






LAC 


90. 

10153 

200 






AO A 


91. 

10154 

360 






LLA 


92, 

10155 

301 






LAB 


93. 

10156 

211 






ACB 


94, 

10157 

350 






LHA 


95, 







9 



96. 

10160 

302 






LAC 


97, 

1.0161 

206 






ADL 


98, 

10162 

320 






LCA 


99, 

1.0163 

301 






LAB 


100, 

10164 

215 






ACH 


101. 

10165 

310 






LB A 


102. 







t 



103. 

10166 

302 






LAC 


104, 

10167 

200 






AOA 


105. 

10170 

320 






LCA 


106. 

10171 

301 






LAB 


107, 

10172 

211 






ACB 


1 0 h . 

10173 

3 10 






1 HA 



SKIP 021,022 

CONVERT ROLLUP TO LINE FEED 
PRINT ONE CHARACTER 
RESTORE ML 


00 A LINE FEED AFTER CARRIAGE RETURN 


GET HORIZONTAL POSITION 
BC»POSITION 


HL*X*2 


BC»X*3 


BC*X *6 
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109, 

10174 

066 

131 

056 021 307 


MLA 

♦ BMPCNTU 


110, 

10201 

202 




AOC 



111, 

10202 

320 




LC A 



112. 

10203 

066 

130 

307 


MLA 

BMPCNT 


113, 

10205 

211 




AC6 



114, 

10207 

310 




LB A 


ADD TO CURRENT INCREMENT 

115, 

10210 

302 




LAC 



116, 

10211 

066 

133 



LL 

HORPOSfi 


117, 

10213 

227 




SUM 



US. 

10214 

320 




LCA 


COMPUTE DISTANCE TO MOVE 

110. 

10215 

301 




LAB 



120, 

10216 

066 

132 



LL 

H0RPQ3 


121, 

10220 

237 




SBM 



122, 

10221 

140 

070 

020 


JTC 

PRTNXT 

FORGET IT 

123, 

10224 

310 




LBA 


BC-DISTANCE 

124, 

10228 

066 

130 

371 


MSB 

BMPCNT 


125, 

10230 

066 

131 

372 


M8C 

BMPCNT+1 


126, 

10233 

104 

070 

020 


JMP 

PRTNXT 

CONTINUE 

127. 





• 




128, 

10230 

306 



INCHL 

LAL 



129, 

10237 

004 

001 



AD 

1 


130. 

10241 

360 




LLA 



131, 

10242 

308 




LAM 



132. 

10243 

014 

000 



AC 

0 


133, 

10248 

380 




LHA 



134, 

10240 

007 




RET 



135, 





. 




138, 

10247 





TM 

2 


137, 

10247 

000 



PL 

DC 

0 


136. 

10280 

000 



PH 

DC 

0 



139. 
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1419, 

141, 

142, 

143, 

144, 

145, 

146, 

147, 

148, 

149, 

150, 

151, 

152, 

153, 


VERSION 1 SERVO DRIVER 

THIS ROUTINE SHOULD 8E CALLED WITH 

A CHARACTER TO BE PRINTED IN THE B*REG 
ANT PRINTABLE ASCII CHARACTER IS OK 
SPECIAL CHARACTERS 
012 — LINE FEED 
014 — FORM FEED 
015 -- CARRIAGE RETURN 

ENTRY CONDITION FOR SPRINT B * CHARACTER 

EXIT CONDITION FOR SPRINT B * CHARACTER (NOTE! HL NOT SAVED) 


154, 

10251 

006 

132 


SPRINT 

LA 

SRVADR 

155, 

10253 

121 




EX 

ADR 

156, 

10254 

301 




LAB 


157, 

10255 

074 

012 



CP 

012 

156. 

10257 

150 

014 

021 


JTZ 

PRLF 

159, 

10262 

074 

014 



CP 

014 

160, 

10264 

150 

030 

021 


JTZ 

PR FF 

101. 

10267 

074 

015 



CP 

015 

162. 

10271 

150 

043 

021 


JTZ 

PRCR 

163, 

10274 

074 

040 



CP 

040 

104. 

10276 

066 

131 

056 021 307 


MLA 

♦BMPCNT+i 

105. 

10303 

110 

320 

020 


JFZ 

CHKTAB 

166. 

10306 

004 

006 


INCBMP 

AO 

6 

167, 

10310 

370 




LMA 


168, 

10311 

066 

130 

307 


MLA 

8MPCNT 

169, 

10314 

014 

000 



AC 

0 

170, 

10316 

370 




LMA 


171. 

10317 

007 




RET 


172. 





• 



173. 

10320 

066 

130 


CHKTAB 

LL 

BMPCNT 

1T4, 

10322 

267 




QRM 


175. 

10323 

110 

351 

020 


JFZ 

BMPHOR 

176, 

10326 

301 



5PRTCH 

LAB 


177. 

10327 

064 

200 



OR 

0200 

178, 

10331 

127 




EX 

WRITE 

179, 

10332 

006 

007 



LA 

7 

180, 

10334 

131 




EX 

COM 1 

181, 

10335 

026 

001 



LC 

1 

182, 

10337 

106 

070 

021 


CALL 

SERVOS 

183. 

10342 

133 




EX 

COM2 

184. 

10343 

066 

131 

307 


MLA 

BMPCNT *1 

185, 

10346 

104 

306 

020 


J HP 

INCBMP 


GET CHARACTER 
LINE FEED 

FORM FEED 

CARRIAGE RETURN 

CHECK FOR SPACE 

INCREMENT TAB COUNT 


SEE IF CARRIAGE TO BE MOVED HORIZONTALLY 

WRITE THE LOW ORDER PORTION OF THE CHARACTER 
WRITE THE HIGH ORDER P0RTI0N(12 BITS ARE REQUIRED) 
WAIT FOR CHARACTER READY 
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1 *6 ii 





* 





187, 





• 

BUMP 

horizontal POSITION 


188, 





• 





189 „ 

10351 

066 

130 

337 

BMPHOR 

MLD 

BMPCNT 

GET THE TAB COUNT IN DE 

190, 

10354 

250 





XRA 



191, 

10355 

370 





lma 



192, 

10356 

066 

131 

347 



mle 

BMPCNT+1 


193 b 

10381 

370 





LMA 



194„ 

10362 

066 

133 

307 



MLA 

HORPOS+1 

INCREMENT HORIZONTAL CARRIAGE POSITION 

193, 

10365 

204 





ADE 



190, 

10366 

370 





LMA 



197„ 

10367 

066 

132 

387 



MLA 

MORPOS 


198, 

10372 

213 





ACD 



199, 

10373 

370 





LMA 



208, 

10374 

006 

132 




LA 

SRVADR 


201, 

10370 

121 





ex 

ADR 


202, 

10377 

304 





LAE 



203, 

10400 

127 





EX 

WRITE 

WRITE THE TAB COUNT 

204, 

10401 

303 





LAO 



203, 

10402 

131 





EX 

COM1 

WRITE THE HIGH ORDER PORTION 

200, 

10403 

026 

002 




LC 

2 


207, 

18403 

106 

070 

021 



CALL 

SERVOS 

WAIT FOR CARRIAGE MOTION READY 

208, 

10410 

135 





EX 

COM3 


209, 

10411 

104 

326 

020 



JMP 

3PRTCH 

GO TO PRINT CHARACTER 

210, 





* 





211, 





• 

LINE 

FEED 



212, 





t 





213, 

10414 

000 

010 


PRIP 

LA 

8 

INOEX EIGHT INCREMENTS 

214, 

10416 

127 





EX 

WRITE 


213, 

10417 

250 





XRA 



210, 

10420 

131 





EX 

COM 1 


217, 

10421 

026 

804 




LC 

4 


218. 

10423 

106 

070 

021 



CALL 

SERVOS 

WAIT FOR PAPER FEED READY 

219, 

10426 

137 





EX 

COMA 


220, 

10427 

007 





RET 



221, 





* 





222, 





9 

FORM 

FEED 



223, 





i 





224, 

10430 

026 

004 


PRFF 

LC 

4 

WAIT FOR PAPER FEED READY 

223, 

10432 

106 

070 

021 



call 

SERVOS 


226, 

10433 

125 





EX 

DATA 

FORM FEED 

227, 

10436 

026 

001 




LC 

1 


228, 

10440 

104 

070 

021 



JMP 

SERVOS 
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22 9, * 

230. , CARRIAGE RETURN 

231. 


232. 

10443 

066 

133 

856 

021 

387 

PRCR 

MIA 

♦HORPOS*1 

WRITE THE HORIZONTAL POSITION COUNT 

233. 

10450 

127 






EX 

WRITE 

THIS IS THE DISTANCE TO BE MOVED 

234, 

10451 

066 

132 

387 




MLA 

HORPOS 


239, 

18494 

064 

004 





OR 

4 

SET DIRECTION LEFT 

236, 

18496 

131 






EX 

COM 1 


237, 

10457 

026 

802 





LC 

2 


238, 

18461 

106 

078 

821 




CALL 

SERVOS 

WAIT FOR CARRIAGE MOTION READY 

239. 

18464 

135 






EX 

COM3 


240. 

10465 

104 

110 

021 




JMP 

REINIT 


241, 







* 




242, 







, SERVO 

STATUS ROUTINE 


243. 







, 




244, 

10470 

006 

132 




SERVOS 

LA 

SRVAOR 


249, 

10472 

121 






EX 

ADR 


246, 

18473 

101 





8ERVWT 

IN 



247. 

10474 

844 

028 





NO 

020 

CHECK ERROR? 

248, 

10476 

112 

107 

021 




CFZ 

RESTQR 


249, 

10501 

101 






IN 



298, 

10902 

242 






NDC 



291. 

10503 

150 

073 

021 




JTZ 

SERVWT 


292, 

10506 

007 






RET 



293, 







• 




294. 

10507 

123 





HE8T0R 

EX 

8TATU8 

RESTORE ON PRINTER 

299, 

10910 

258 





RE2NIT 

XRA 


INITIALIZE BUMP COUNT ANO HORIZONTAL POSITION 

250, 

10511 

066 

130 

096 

021 

370 


MSA 

♦BMPCNT 


257, 

10516 

866 

131 

370 




(ISA 

BMPCNTM 


298. 

10921 

066 

132 

370 




MSA 

HORPOS 


299, 

10924 

066 

133 

370 




MSA 

H0RPQ8*1 


260, 

10527 

007 






RET 



261, 







* 




262. 







. DATA 

mm 

MUST BE IN 

ONE PAGE 

263. 







. 




264, 

18530 







TM 

4 


265, 

10530 

000 

808 




8MPCNT 

DA 

8 

BUMP COUNT 

266, 

18532 

000 

000 




HORPOS 

DA 

0 

HORIZONTAL POSITION 

267. 

00132 






SRVAOR 

EGU 

0132 

SERVO PRINTER ADDRESS 

268. 

10800 






« 
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10530 

BMPCNT 

36 

37 

109 112 124 125 164 166 

173 184 



189 

192 

256 257 *265 


10351 

BMPHUW 

175 

*189 



10320 

CHKTAB 

165 

*173 



10532 

H0RP05 

36 

39 

116 120 194 197 232 234 

258 259 



*266 




10306 

INCBMP 

*166 

185 



10236 

INCHL 

45 

86 

*128 


10136 

PBUMP 

51 

*83 



10250 

PH 

70 

79 

*136 


10247 

PL 

71 

80 

*137 


10443 

PRCR 

162 

*232 



10430 

PRFF 

160 

*224 



10024 

PRINT* 

*44 

64 



10000 

PR1NTP 

*32 




10065 

PRINTS 

53 

56 

*58 


10414 

PRLF 

156 

*213 



10111 

PRSHL 

59 

*70 

83 


10070 

PRTNXT 

49 

55 

*59 122 126 


10123 

P3VHU 

46 

*77 

87 


10510 

REINIT 

240 

*255 



10507 

RESTOR 

246 

*254 



10470 

SERVOS 

182 

207 

216 225 228 238 *244 


10473 

SERV*T 

*246 

251 



10251 

SPRINT 

58 

66 

*154 


10326 

SPRTCH 

*176 

209 



00132 

SR V ADR 

32 

154 

200 244 *267 




PACE It) 
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29 LABELS USED 



